home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus Extra 1996 #2 / Amiga Plus CD - 1996 - No. 2 Extra.iso / clarissa1_1-demo / macros / edit.clssa < prev    next >
Text File  |  1995-01-23  |  708b  |  27 lines
  1. /***********************************************************************
  2.   GADGET: "'Edit Macro'" "1" AUTO TYP: "?"
  3.  
  4.   $DAT >>Edit.clssa<<         23.09.1992 - (C) ProDAD Holger Burkarth
  5.                               20.01.1995 - (C) ProDAD Michael Christoph
  6. ************************************************************************/
  7.  
  8. OPTIONS RESULTS
  9. ADDRESS clariSSA
  10.  
  11.   FailAt 20
  12.   AltFail=RESULT
  13.  
  14.   PubScreenName = "SSA Screen"
  15.  
  16.   SetBasicScreen FRONT TO 0 0
  17.   FileSelect "TITLE 'Macro laden..' PTEXT Laden"
  18.  
  19.   IF RC = 0 THEN DO
  20.     MacroName = RESULT
  21.     ADDRESS COMMAND Ed MacroName' WINDOW "CON:0/12/640/170/Ed: 'MacroName'/CLOSE/SCREEN'PubScreenName'"'
  22.     ADDRESS clariSSA
  23.   END
  24.  
  25.  
  26.   FailAt AltFail
  27. exit